home *** CD-ROM | disk | FTP | other *** search
/ Chip 2005 May / CMCD0505.ISO / Software / Demo / DesktopX / objects / ktekdockv1.dxpack / {1EA830F3-C3D6-466F-BF4A-E146F5BDAEB4}.DXScript2 < prev    next >
Extensible Markup Language  |  2004-08-24  |  1KB  |  29 lines
  1. <?xml version="1.0"?>
  2. <!--DXScript Data File.  Version 2.0-->
  3. <DXScript>
  4.     <Script><![CDATA['Called when the script is executed
  5. Sub Object_OnScriptEnter
  6.  
  7. End Sub
  8.  
  9. Sub Object_OnStateChange(state)
  10.     If state="Command executed" Then
  11.         If object.state="dove" Then
  12.             object.state="xp"
  13.             DesktopX.ScriptObject("kbarpin").savelogo("xp")
  14.         ElseIf object.State="xp" Then
  15.             object.State="apple"
  16.             DesktopX.ScriptObject("kbarpin").savelogo("apple")
  17.         Else
  18.             object.state="dove"
  19.             DesktopX.ScriptObject("kbarpin").savelogo("dove")
  20.         End If
  21.     End If
  22. End Sub
  23.  
  24. 'Called when the script is terminated
  25. Sub Object_OnScriptExit
  26.  
  27. End Sub
  28. ]]></Script><Globals><Editor><PropPane>0</PropPane><EditorLeft>296</EditorLeft><EditorTop>85</EditorTop><EditorRight>1015</EditorRight><EditorBottom>515</EditorBottom></Editor><Object><LanguageCLSID>{B54F3741-5B07-11CF-A4B0-00AA004A55E8}</LanguageCLSID><ControlCLSID>{00000000-0000-0000-0000-000000000000}</ControlCLSID><ControlObjWidth>64</ControlObjWidth><ControlObjHeight>64</ControlObjHeight><RunState>1</RunState><ManualControlLoad>0</ManualControlLoad><ScriptHostVersion>2</ScriptHostVersion></Object></Globals></DXScript>
  29.